home *** CD-ROM | disk | FTP | other *** search
/ The Macintosh Demo Applications CD / Apple-MacintoshDemoApplicationsCD-1.0-1992.bin / More Information / Persuasion / Global Cast / Global Cast.rsrc / TEXT_1332.txt < prev    next >
Text File  |  1988-10-26  |  122b  |  7 lines

  1. s#
  2. set &y = mouseh
  3. if commanddown then skip 2
  4. exit
  5. if not thechar = 'p' then skip 2
  6. if mouseh = &y then skip -1
  7. exit&Àáh